home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Extra 1997 #1 / Amiga Plus Extra 1997 #1.iso / programme / tools / leoutils / leolib.c < prev    next >
C/C++ Source or Header  |  1996-11-25  |  7KB  |  276 lines
  1. #include "LeoLib.h"
  2.  
  3.  
  4. #if defined _AMIGA || defined AMIGA
  5. static char *__LeoLibVersion = "$VER:LeoLib 1.0"
  6. #if defined __SASC
  7.     " " __AMIGADATE__ " ©1994 Leopold-Soft"
  8. #endif
  9. ;
  10. #endif
  11.  
  12.  
  13.  
  14. typedef unsigned char uchar;
  15.  
  16.  
  17. uchar __LeoCType[] = {
  18.     0                      , /* $-1  -1    */
  19.     _C   , /* $ 0   0    */
  20.     _C   , /* $ 1   1    */
  21.     _C   , /* $ 2   2    */
  22.     _C   , /* $ 3   3    */
  23.     _C   , /* $ 4   4    */
  24.     _C   , /* $ 5   5    */
  25.     _C   , /* $ 6   6    */
  26.     _C   , /* $ 7   7    */
  27.     _C   , /* $ 8   8    */
  28.     _C|_S, /* $ 9   9    */
  29.     _C|_S, /* $ A  10    */
  30.     _C|_S, /* $ B  11    */
  31.     _C|_S, /* $ C  12    */
  32.     _C|_S, /* $ D  13    */
  33.     _C   , /* $ E  14    */
  34.     _C   , /* $ F  15    */
  35.     _C   , /* $10  16    */
  36.     _C   , /* $11  17    */
  37.     _C   , /* $12  18    */
  38.     _C   , /* $13  19    */
  39.     _C   , /* $14  20    */
  40.     _C   , /* $15  21    */
  41.     _C   , /* $16  22    */
  42.     _C   , /* $17  23    */
  43.     _C   , /* $18  24    */
  44.     _C   , /* $19  25    */
  45.     _C   , /* $1A  26    */
  46.     _C   , /* $1B  27    */
  47.     _C   , /* $1C  28    */
  48.     _C   , /* $1D  29    */
  49.     _C   , /* $1E  30    */
  50.     _C   , /* $1F  31    */
  51.     _B|_S, /* $20  32    */
  52.     _P   , /* $21  33 !  */
  53.     _P   , /* $22  34 "  */
  54.     _P   , /* $23  35 #  */
  55.     _P   , /* $24  36 $  */
  56.     _P   , /* $25  37 %  */
  57.     _P   , /* $26  38 &  */
  58.     _P   , /* $27  39 '  */
  59.     _P   , /* $28  40 (  */
  60.     _P   , /* $29  41 )  */
  61.     _P   , /* $2A  42 *  */
  62.     _P   , /* $2B  43 +  */
  63.     _P   , /* $2C  44 ,  */
  64.     _P   , /* $2D  45 -  */
  65.     _P   , /* $2E  46 .  */
  66.     _P   , /* $2F  47 /  */
  67.     _X|_N, /* $30  48 0  */
  68.     _X|_N, /* $31  49 1  */
  69.     _X|_N, /* $32  50 2  */
  70.     _X|_N, /* $33  51 3  */
  71.     _X|_N, /* $34  52 4  */
  72.     _X|_N, /* $35  53 5  */
  73.     _X|_N, /* $36  54 6  */
  74.     _X|_N, /* $37  55 7  */
  75.     _X|_N, /* $38  56 8  */
  76.     _X|_N, /* $39  57 9  */
  77.     _P   , /* $3A  58 :  */
  78.     _P   , /* $3B  59 ;  */
  79.     _P   , /* $3C  60 <  */
  80.     _P   , /* $3D  61 =  */
  81.     _P   , /* $3E  62 >  */
  82.     _P   , /* $3F  63 ?  */
  83.     _P   , /* $40  64 @  */
  84.     _X|_U, /* $41  65 A  */
  85.     _X|_U, /* $42  66 B  */
  86.     _X|_U, /* $43  67 C  */
  87.     _X|_U, /* $44  68 D  */
  88.     _X|_U, /* $45  69 E  */
  89.     _X|_U, /* $46  70 F  */
  90.        _U, /* $47  71 G  */
  91.        _U, /* $48  72 H  */
  92.        _U, /* $49  73 I  */
  93.        _U, /* $4A  74 J  */
  94.        _U, /* $4B  75 K  */
  95.        _U, /* $4C  76 L  */
  96.        _U, /* $4D  77 M  */
  97.        _U, /* $4E  78 N  */
  98.        _U, /* $4F  79 O  */
  99.        _U, /* $50  80 P  */
  100.        _U, /* $51  81 Q  */
  101.        _U, /* $52  82 R  */
  102.        _U, /* $53  83 S  */
  103.        _U, /* $54  84 T  */
  104.        _U, /* $55  85 U  */
  105.        _U, /* $56  86 V  */
  106.        _U, /* $57  87 W  */
  107.        _U, /* $58  88 X  */
  108.        _U, /* $59  89 Y  */
  109.        _U, /* $5A  90 Z  */
  110.     _P   , /* $5B  91 [  */
  111.     _P   , /* $5C  92 \  */
  112.     _P   , /* $5D  93 ]  */
  113.     _P   , /* $5E  94 ^  */
  114.     _P   , /* $5F  95 _  */
  115.     _P   , /* $60  96 `  */
  116.     _X|_L, /* $61  97 a  */
  117.     _X|_L, /* $62  98 b  */
  118.     _X|_L, /* $63  99 c  */
  119.     _X|_L, /* $64 100 d  */
  120.     _X|_L, /* $65 101 e  */
  121.     _X|_L, /* $66 102 f  */
  122.        _L, /* $67 103 g  */
  123.        _L, /* $68 104 h  */
  124.        _L, /* $69 105 i  */
  125.        _L, /* $6A 106 j  */
  126.        _L, /* $6B 107 k  */
  127.        _L, /* $6C 108 l  */
  128.        _L, /* $6D 109 m  */
  129.        _L, /* $6E 110 n  */
  130.        _L, /* $6F 111 o  */
  131.        _L, /* $70 112 p  */
  132.        _L, /* $71 113 q  */
  133.        _L, /* $72 114 r  */
  134.        _L, /* $73 115 s  */
  135.        _L, /* $74 116 t  */
  136.        _L, /* $75 117 u  */
  137.        _L, /* $76 118 v  */
  138.        _L, /* $77 119 w  */
  139.        _L, /* $78 120 x  */
  140.        _L, /* $79 121 y  */
  141.        _L, /* $7A 122 z  */
  142.     _P   , /* $7B 123 {  */
  143.     _P   , /* $7C 124 |  */
  144.     _P   , /* $7D 125 }  */
  145.     _P   , /* $7E 126 ~  */
  146.     _C   , /* $7F 127    */
  147.     _C   , /* $80 128    */
  148.     _C   , /* $81 129    */
  149.     _C   , /* $82 130    */
  150.     _C   , /* $83 131    */
  151.     _C   , /* $84 132    */
  152.     _C   , /* $85 133    */
  153.     _C   , /* $86 134    */
  154.     _C   , /* $87 135    */
  155.     _C   , /* $88 136    */
  156.     _C   , /* $89 137    */
  157.     _C   , /* $8A 138    */
  158.     _C   , /* $8B 139    */
  159.     _C   , /* $8C 140    */
  160.     _C   , /* $8D 141    */
  161.     _C   , /* $8E 142    */
  162.     _C   , /* $8F 143    */
  163.     _C   , /* $90 144    */
  164.     _C   , /* $91 145    */
  165.     _C   , /* $92 146    */
  166.     _C   , /* $93 147    */
  167.     _C   , /* $94 148    */
  168.     _C   , /* $95 149    */
  169.     _C   , /* $96 150    */
  170.     _C   , /* $97 151    */
  171.     _C   , /* $98 152    */
  172.     _C   , /* $99 153    */
  173.     _C   , /* $9A 154    */
  174.     _C   , /* $9B 155    */
  175.     _C   , /* $9C 156    */
  176.     _C   , /* $9D 157    */
  177.     _C   , /* $9E 158    */
  178.     _C   , /* $9F 159    */
  179.     _P   , /* $A0 160 hard space        */
  180.     _P   , /* $A1 161 ! upside down        */
  181.     _P   , /* $A2 162 cent                */
  182.     _P   , /* $A3 163 pound             */
  183.     _P   , /* $A4 164 equ sun             */
  184.     _P   , /* $A5 165 yen                */
  185.     _P   , /* $A6 166 double pipe        */
  186.     _P   , /* $A7 167 rule (SS)            */
  187.     _P   , /* $A8 168 Umlaut "            */
  188.     _P   , /* $A9 169 (C)                */
  189.     _P   , /* $AA 170 a over -            */
  190.     _P   , /* $AB 171 <<                */
  191.     _P   , /* $AC 172 overscore (-) w/ hook    */
  192.     _P   , /* $AD 173 strikethru (-)    */
  193.     _P   , /* $AE 174 (R)                */
  194.     _P   , /* $AF 175 overscore (-)        */
  195.     _P   , /* $B0 176 degree            */
  196.     _P   , /* $B1 177 +-                */
  197.     _P   , /* $B2 178 ^2                */
  198.     _P   , /* $B3 179 ^3                */
  199.     _P   , /* $B4 180 single umlaut '    */
  200.     _P   , /* $B5 181 micro, u            */
  201.     _P   , /* $B6 182 pi                */
  202.     _P   , /* $B7 183 dot                */
  203.     _P   , /* $B8 184 accent ,            */
  204.     _P   , /* $B9 185 ^1                */
  205.     _P   , /* $BA 186 o over -            */
  206.     _P   , /* $BB 187 >>                */
  207.     _P   , /* $BC 188 1/4                */
  208.     _P   , /* $BD 189 1/2                */
  209.     _P   , /* $BE 190 3/4                */
  210.     _P   , /* $BF 191 ? upside down        */
  211.        _U, /* $C0 192 A` */
  212.        _U, /* $C1 193 A' */
  213.        _U, /* $C2 194 A^ */
  214.        _U, /* $C3 195 A~ */
  215.        _U, /* $C4 196 A" */
  216.        _U, /* $C5 197 Ao */
  217.        _U, /* $C6 198 AE */
  218.        _U, /* $C7 199 C, */
  219.        _U, /* $C8 200 E` */
  220.        _U, /* $C9 201 E' */
  221.        _U, /* $CA 202 E^ */
  222.        _U, /* $CB 203 E" */
  223.        _U, /* $CC 204 I` */
  224.        _U, /* $CD 205 I' */
  225.        _U, /* $CE 206 I^ */
  226.        _U, /* $CF 207 I" */
  227.        _U, /* $D0 208 -D */
  228.        _U, /* $D1 209 N~ */
  229.        _U, /* $D2 210 O` */
  230.        _U, /* $D3 211 O' */
  231.        _U, /* $D4 212 O^ */
  232.        _U, /* $D5 213 O~ */
  233.        _U, /* $D6 214 O" */
  234.     _P   , /* $D7 215 ×  */
  235.        _U, /* $D8 216 O/ */
  236.        _U, /* $D9 217 U` */
  237.        _U, /* $DA 218 U' */
  238.        _U, /* $DB 219 U^ */
  239.        _U, /* $DC 220 U" */
  240.        _U, /* $DD 221 Y' */
  241.        _U, /* $DE 222 |O */
  242.        _U, /* $DF 223 |B */
  243.        _L, /* $E0 224 a` */
  244.        _L, /* $E1 225 a' */
  245.        _L, /* $E2 226 a^ */
  246.        _L, /* $E3 227 a~ */
  247.        _L, /* $E4 228 a" */
  248.        _L, /* $E5 229 ao */
  249.        _L, /* $E6 230 ae */
  250.        _L, /* $E7 231 c, */
  251.        _L, /* $E8 232 e` */
  252.        _L, /* $E9 233 e' */
  253.        _L, /* $EA 234 e^ */
  254.        _L, /* $EB 235 e" */
  255.        _L, /* $EC 236 i` */
  256.        _L, /* $ED 237 i' */
  257.        _L, /* $EE 238 i^ */
  258.        _L, /* $EF 239 i" */
  259.        _L, /* $F0 240 d- */
  260.        _L, /* $F1 241 n~ */
  261.        _L, /* $F2 242 o` */
  262.        _L, /* $F3 243 o' */
  263.        _L, /* $F4 244 o^ */
  264.        _L, /* $F5 245 o~ */
  265.        _L, /* $F6 246 o" */
  266.     _P   , /* $F7 247 '-.*/
  267.        _L, /* $F8 248 o/ */
  268.        _L, /* $F9 249 u` */
  269.        _L, /* $FA 250 u' */
  270.        _L, /* $FB 251 u^ */
  271.        _L, /* $FC 252 u" */
  272.        _L, /* $FD 253 y' */
  273.        _L, /* $FE 254 |o */
  274.        _L  /* $FF 255 y" */
  275. };
  276.